home *** CD-ROM | disk | FTP | other *** search
/ Multimedia Animal World / Multimedia Animal World.iso / pc / data / chapters / database.dir / 00066.ls < prev    next >
Encoding:
Text File  |  1980-01-25  |  486 b   |  28 lines
  1. on mouseUp
  2.   if the mouseH < 320 then
  3.     if the frame <> 10 then
  4.       go(the frame - 5)
  5.       set vv to the frame + 5
  6.       set xx to vv / 5
  7.       unLoadCast(120 + xx)
  8.       unLoadCast(70 + xx)
  9.       exit
  10.     else
  11.       go(230)
  12.       exit
  13.     end if
  14.   else
  15.     if the frame <> 230 then
  16.       go(the frame + 5)
  17.       set vv to the frame - 5
  18.       set xx to vv / 5
  19.       unLoadCast(120 + xx)
  20.       unLoadCast(70 + xx)
  21.       exit
  22.     else
  23.       go(10)
  24.       exit
  25.     end if
  26.   end if
  27. end
  28.